********************************************************************************
* 								 ROBUSTNESS ANALYSES						   *
********************************************************************************

clear all
set more off
set scheme s2color
grstyle init
grstyle set plain, horizontal grid dotted box
macro drop _all
est drop _all
set matsize 800
set seed 8675309

** Set Working Directory

if c(username) == "cb2257" {
global dir "~/Desktop"  // CWB's Directory
global main "${dir}/APSR Replication"
global code "${main}/Analysis"	
global data "${main}/Data"	
global figs "${main}/Figures"
global tabs "${main}/Tables"																			
}

if c(username) == "christopherblair" {
global dir "~/Desktop"  // CWB's Directory
global main "${dir}/APSR Replication"
global code "${main}/Analysis"	
global data "${main}/Data"	
global figs "${main}/Figures"
global tabs "${main}/Tables"																			
}

else if c(username) == "yourusername"{
global dir "~/yourfilepath"  // YOUR Directory
}

cd "${main}"

********************************************************************************
********************************************************************************
********************************************************************************
********************************************************************************
********************************************************************************

use "${data}/Survey/survey_final.dta", clear
est drop _all

sort respondent_id

global core "republican democrat woman highschool college age"
global additional "conservative liberal ib5.race employed native religiosity empathy pol_interest"

********************************************************************************
* 								 BALANCE TESTS				 			 	   *
********************************************************************************
** Table D-1 of the Tabular Supplement

eststo clear

gen exposure=hurricane_index1
egen std_age=std(age)
egen std_ideology=std(ideology)


eststo: reghdfe republican 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe democrat 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe woman 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe highschool 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe college 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe std_age 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe std_ideology 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe race_white 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe race_black 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe race_latinx 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe employed 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe native 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe religiosity 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe empathy 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe pol_interest 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

esttab using "${tabs}/Balance.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure) stats(N Exposure cov County Date, fmt(0 3 3) labels("Observations" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{17}{c}} \hline & \\ & & \multicolumn{15}{c}{\shortstack{\textbf{Demographic Balance}}} \\ \cline{3-17} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("Republican" "Democrat" "Woman" "\shortstack{ \\High School\\Graduate}" "\shortstack{ \\College\\Graduate}" "\shortstack{Age}" "\shortstack{ \\Political\\Ideology}" "\shortstack{White}" "\shortstack{Black}" "\shortstack{Latinx}" "\shortstack{Employed}" "\shortstack{Native\\Born}" "\shortstack{Religiosity}" "\shortstack{Empathy}" "\shortstack{ \\Political\\Interest}") extracols(1) replace

eststo clear
** Figure A-1a of the Main Appendix

eststo: reghdfe republican 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe democrat 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe woman 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe highschool 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe college 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe std_age 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)

coefplot (est1, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est2, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(11) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est3, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est4, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(11) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est5, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est6, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))), keep(1.post#c.exposure) ci(95 90) yline(0, lcolor(cranberry) lpatt(shortdash)) xtitle("Hurricane Exposure x Post", size(medium)) xscale(titlegap(*5)) xlabel(-.2(.1).2) xmtick(-.2(.05).2) legend(off) xline(0, lcolor(cranberry) lpatt(shortdash)) ylabel(.63 "Republican" .78 "Democrat" .93 "Woman" 1.07 "High School Graduate" 1.21 "College Graduate" 1.36 "Age")
graph export "${figs}/balance_core.png", replace

eststo clear
** Figure A-1b of the Main Appendix

eststo: reghdfe std_ideology 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe race_white 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe race_black 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe race_latinx 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe employed 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe native 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe religiosity 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe empathy 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe pol_interest 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)

coefplot (est1, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est2, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est3, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(11) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est4, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(11) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est5, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(11) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est6, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est7, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(11) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est8, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est9, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))), keep(1.post#c.exposure) ci(95 90) yline(0, lcolor(cranberry) lpatt(shortdash)) xtitle("Hurricane Exposure x Post", size(medium)) xscale(titlegap(*5)) xlabel(-.3(.1).3) xmtick(-.3(.05).3) legend(off) xline(0, lcolor(cranberry) lpatt(shortdash)) ylabel(.6 "Political Ideology" .7 "White" .8 "Black" .9 "Latinx" 1 "Employed" 1.1 "Native Born" 1.2 "Religiosity" 1.3 "Empathy" 1.4 "Political Interest") 
graph export "${figs}/balance_additional.png", replace

reghdfe duration 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)

drop exposure
eststo clear
** Result not presented in paper

gen exposure=(hurricane_index1>-.6112757)

eststo: reghdfe republican 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe democrat 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe woman 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe highschool 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe college 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe std_age 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)

coefplot (est1, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est2, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(11) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est3, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est4, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(11) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est5, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est6, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))), keep(1.post#c.exposure) ci(95 90) yline(0, lcolor(cranberry) lpatt(shortdash)) xtitle("Hurricane Exposure x Post", size(medium)) xscale(titlegap(*5)) xlabel(-.2(.1).4) xmtick(-.2(.05).4) legend(off) xline(0, lcolor(cranberry) lpatt(shortdash)) ylabel(.63 "Republican" .78 "Democrat" .93 "Woman" 1.07 "High School Graduate" 1.21 "College Graduate" 1.36 "Age")
graph export "${figs}/balance_core2.png", replace

eststo clear
** Result not presented in paper

eststo: reghdfe std_ideology 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe race_white 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe race_black 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe race_latinx 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe employed 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe native 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe religiosity 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe empathy 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
eststo: reghdfe pol_interest 1.post#c.exposure if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)

coefplot (est1, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est2, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est3, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(11) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est4, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(11) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est5, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(11) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est6, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est7, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(11) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est8, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est9, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))), keep(1.post#c.exposure) ci(95 90) yline(0, lcolor(cranberry) lpatt(shortdash)) xtitle("Hurricane Exposure x Post", size(medium)) xscale(titlegap(*5)) xlabel(-.5(.1).4) xmtick(-.5(.05).4) legend(off) xline(0, lcolor(cranberry) lpatt(shortdash)) ylabel(.6 "Political Ideology" .7 "White" .8 "Black" .9 "Latinx" 1 "Employed" 1.1 "Native Born" 1.2 "Religiosity" 1.3 "Empathy" 1.4 "Political Interest") 
graph export "${figs}/balance_additional2.png", replace

drop exposure std_age std_ideology
eststo clear

********************************************************************************
* 							 OUTCOMES W/ BJS ESTIMATOR						   *
********************************************************************************
** Table A-11 of the Main Appendix

eststo clear

qui reghdfe climmig_importance 1.post#c.hurricane_index1 $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
gen esample=(e(sample))

gen bjsvar=22916
replace bjsvar=. if hurricane_index1<=-.6112757

eststo: did_imputation climmig_importance geoid start_date bjsvar if esample==1 [aw=eweight], cluster(geoid) autosample fe(geoid start_date) minn(0) controls($core)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: did_imputation climmig_action geoid start_date bjsvar if esample==1 [aw=eweight], cluster(geoid) autosample fe(geoid start_date) minn(0) controls($core)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: did_imputation climchg_importance geoid start_date bjsvar if esample==1 [aw=eweight], cluster(geoid) autosample fe(geoid start_date) minn(0) controls($core)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: did_imputation climchg_action geoid start_date bjsvar if esample==1 [aw=eweight], cluster(geoid) autosample fe(geoid start_date) minn(0) controls($core)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: did_imputation climchg_mitigation geoid start_date bjsvar if esample==1 [aw=eweight], cluster(geoid) autosample fe(geoid start_date) minn(0) controls($core)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: did_imputation climchg_adaptation geoid start_date bjsvar if esample==1 [aw=eweight], cluster(geoid) autosample fe(geoid start_date) minn(0) controls($core)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: did_imputation climchg_science geoid start_date bjsvar if esample==1 [aw=eweight], cluster(geoid) autosample fe(geoid start_date) minn(0) controls($core)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

esttab using "${tabs}/Climate_Outcomes_BJS.tex", style(tex) b(3) se(3) nonotes keep(tau) stats(N Exposure cov County Date Demographic, fmt(0 3 3) labels("Observations" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE" "\hspace{3mm}Demographic Covariates")) varlabels(tau "& \\ Hurricane Exposure x Post") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change Policies}}} & & \shortstack{\textbf{Science of Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace
esttab using "${tabs}/Climate_Outcomes_BJS_Covariates.tex", style(tex) b(3) se(3) nonotes keep(tau republican democrat woman highschool college age) stats(N Exposure cov County Date, fmt(0 3 3) labels("Observations" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE")) varlabels(tau "& \\ Hurricane Exposure x Post" republican "& \\ Republican" democrat "Democrat" woman "Woman" highschool "High School Graduate" college "College Graduate" age "Age") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace

drop bjsvar esample
eststo clear

********************************************************************************
* 							 HURRICANE IDA PLACEBO							   *
********************************************************************************
** Table A-14 of the Main Appendix

eststo clear

eststo: reghdfe climmig_importance 1.post#c.ida_index1 1.post#c.hurricane_index1 $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"
test _b[1.post#c.ida_index1] = _b[1.post#c.hurricane_index1]

eststo: reghdfe climmig_action 1.post#c.ida_index1 1.post#c.hurricane_index1 $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"
test _b[1.post#c.ida_index1] = _b[1.post#c.hurricane_index1]

eststo: reghdfe climchg_importance 1.post#c.ida_index1 1.post#c.hurricane_index1 $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"
test _b[1.post#c.ida_index1] = _b[1.post#c.hurricane_index1]

eststo: reghdfe climchg_action 1.post#c.ida_index1 1.post#c.hurricane_index1 $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"
test _b[1.post#c.ida_index1] = _b[1.post#c.hurricane_index1]

eststo: reghdfe climchg_mitigation 1.post#c.ida_index1 1.post#c.hurricane_index1 $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"
test _b[1.post#c.ida_index1] = _b[1.post#c.hurricane_index1]

eststo: reghdfe climchg_adaptation 1.post#c.ida_index1 1.post#c.hurricane_index1 $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"
test _b[1.post#c.ida_index1] = _b[1.post#c.hurricane_index1]

eststo: reghdfe climchg_science 1.post#c.ida_index1 1.post#c.hurricane_index1 $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"
test _b[1.post#c.ida_index1] = _b[1.post#c.hurricane_index1]

esttab using "${tabs}/Climate_Outcomes_Ida.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.ida_index1 1.post#c.hurricane_index1) stats(N aic Exposure cov County Date Demographic, fmt(0 3 3) labels("Observations" "AIC" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE" "\hspace{3mm}Demographic Covariates")) varlabels(1.post#c.ida_index1 "& \\ Hurricane Ida Exposure x Post" 1.post#c.hurricane_index1 "& \\ Hurricane Ian Exposure x Post") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace
esttab using "${tabs}/Climate_Outcomes_Ida_Covariates.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.ida_index1 1.post#c.hurricane_index1 republican democrat woman highschool college age) stats(N Exposure cov County Date, fmt(0 3 3) labels("Observations" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE")) varlabels(1.post#c.ida_index1 "& \\ Hurricane Ida Exposure x Post" 1.post#c.hurricane_index1 "& \\ Hurricane Ian Exposure x Post" republican "& \\ Republican" democrat "Democrat" woman "Woman" highschool "High School Graduate" college "College Graduate" age "Age") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace

eststo clear

********************************************************************************
* 							 OUTCOMES W/ BINARY EXPOSURE					   *
********************************************************************************
** Table A-4 of the Main Appendix

eststo clear

gen exposure=(hurricane_index1>-.6112757)
eststo: reghdfe climmig_importance 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Binary"

eststo: reghdfe climmig_action 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Binary"

eststo: reghdfe climchg_importance 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Binary"

eststo: reghdfe climchg_action 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Binary"

eststo: reghdfe climchg_mitigation 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Binary"

eststo: reghdfe climchg_adaptation 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Binary"

eststo: reghdfe climchg_science 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Binary"

esttab using "${tabs}/Climate_Outcomes_Binary.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure) stats(N aic Exposure cov County Date Demographic, fmt(0 3 3) labels("Observations" "AIC" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE" "\hspace{3mm}Demographic Covariates")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace
esttab using "${tabs}/Climate_Outcomes_Binary_Covariates.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure republican democrat woman highschool college age) stats(N Exposure cov County Date, fmt(0 3 3) labels("Observations" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post" republican "& \\ Republican" democrat "Democrat" woman "Woman" highschool "High School Graduate" college "College Graduate" age "Age") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace

drop exposure
eststo clear

********************************************************************************
* 							 OUTCOMES W/ ATTENTIVE RESPONDENTS				   *
********************************************************************************
** Results not presented in paper

eststo clear

gen exposure=hurricane_index1
eststo: reghdfe climmig_importance 1.post#c.exposure $core if estsample==1 & botfilter2==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climmig_action 1.post#c.exposure $core if estsample==1 & botfilter2==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_importance 1.post#c.exposure $core if estsample==1 & botfilter2==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_action 1.post#c.exposure $core if estsample==1 & botfilter2==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_mitigation 1.post#c.exposure $core if estsample==1 & botfilter2==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_adaptation 1.post#c.exposure $core if estsample==1 & botfilter2==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_science 1.post#c.exposure $core if estsample==1 & botfilter2==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

esttab using "${tabs}/Climate_Outcomes_AttentiveSample.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure) stats(N aic Exposure cov County Date Demographic, fmt(0 3 3) labels("Observations" "AIC" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE" "\hspace{3mm}Demographic Covariates")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace
esttab using "${tabs}/Climate_Outcomes_AttentiveSample_Covariates.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure republican democrat woman highschool college age) stats(N Exposure cov County Date, fmt(0 3 3) labels("Observations" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post" republican "& \\ Republican" democrat "Democrat" woman "Woman" highschool "High School Graduate" college "College Graduate" age "Age") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace

drop exposure
eststo clear

********************************************************************************
* 							 OUTCOMES W/O TREND BREAKS						   *
********************************************************************************
** Table A-2 of the Main Appendix

eststo clear

gen sdaysrelative=.
replace sdaysrelative=0 if time2ian==0
replace sdaysrelative=1 if time2ian==1
replace sdaysrelative=2 if time2ian==5
replace sdaysrelative=3 if time2ian==6
replace sdaysrelative=4 if time2ian==9
replace sdaysrelative=5 if time2ian==14
replace sdaysrelative=6 if time2ian==23
replace sdaysrelative=7 if time2ian==29
replace sdaysrelative=-1 if time2ian==-1
replace sdaysrelative=-2 if time2ian==-2
replace sdaysrelative=-3 if time2ian==-9
replace sdaysrelative=-4 if time2ian==-22
replace sdaysrelative=-5 if time2ian==-30
replace sdaysrelative=-5 if time2ian==-31
replace sdaysrelative=-5 if time2ian==-32
replace sdaysrelative=-6 if time2ian==-33
replace sdaysrelative=-6 if time2ian==-35
replace sdaysrelative=-6 if time2ian==-36
replace sdaysrelative=-6 if time2ian==-37
replace sdaysrelative=-7 if time2ian==-44
replace sdaysrelative=-7 if time2ian==-47
replace sdaysrelative=-7 if time2ian==-48
label var sdaysrelative "Survey Rounds Relative to Treatment"
gen time=sdaysrelative+8

gen exposure=hurricane_index1
eststo: reghdfe climmig_importance 1.post#c.exposure $core if estsample==1 & time!=4 & time!=5 & time!=7 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climmig_action 1.post#c.exposure $core if estsample==1 & time!=4 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_importance 1.post#c.exposure $core if estsample==1 & time!=2 & time!=3 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_action 1.post#c.exposure $core if estsample==1 & time!=1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_mitigation 1.post#c.exposure $core if estsample==1 & time!=4 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_adaptation 1.post#c.exposure $core if estsample==1 & time!=4 & time!=7 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_science 1.post#c.exposure $core if estsample==1 & time!=3 & time!=4 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

esttab using "${tabs}/Climate_Outcomes_TrendBreaks.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure) stats(N aic Exposure cov County Date Demographic, fmt(0 3 3) labels("Observations" "AIC" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE" "\hspace{3mm}Demographic Covariates")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace
esttab using "${tabs}/Climate_Outcomes_TrendBreaks_Covariates.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure republican democrat woman highschool college age) stats(N Exposure cov County Date, fmt(0 3 3) labels("Observations" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post" republican "& \\ Republican" democrat "Democrat" woman "Woman" highschool "High School Graduate" college "College Graduate" age "Age") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace

drop exposure
eststo clear

********************************************************************************
* 							 OUTCOMES W/ CEM MATCHING						   *
********************************************************************************
** Table A-7 of the Main Appendix

eststo clear

gen exposure=(hurricane_index1>-.6112757)
cem $core, treatment(exposure)

eststo: reghdfe climmig_importance 1.post#c.exposure $core if estsample==1 & cem_matched==1 [aw=cem_weight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Binary"

eststo: reghdfe climmig_action 1.post#c.exposure $core if estsample==1 & cem_matched==1 [aw=cem_weight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Binary"

eststo: reghdfe climchg_importance 1.post#c.exposure $core if estsample==1 & cem_matched==1 [aw=cem_weight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Binary"

eststo: reghdfe climchg_action 1.post#c.exposure $core if estsample==1 & cem_matched==1 [aw=cem_weight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Binary"

eststo: reghdfe climchg_mitigation 1.post#c.exposure $core if estsample==1 & cem_matched==1 [aw=cem_weight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Binary"

eststo: reghdfe climchg_adaptation 1.post#c.exposure $core if estsample==1 & cem_matched==1 [aw=cem_weight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Binary"

eststo: reghdfe climchg_science 1.post#c.exposure $core if estsample==1 & cem_matched==1 [aw=cem_weight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Binary"

esttab using "${tabs}/Climate_Outcomes_CEM.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure) stats(N aic Exposure cov County Date Demographic, fmt(0 3 3) labels("Observations" "AIC" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE" "\hspace{3mm}Demographic Covariates")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace
esttab using "${tabs}/Climate_Outcomes_CEM_Covariates.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure republican democrat woman highschool college age) stats(N Exposure cov County Date, fmt(0 3 3) labels("Observations" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post" republican "& \\ Republican" democrat "Democrat" woman "Woman" highschool "High School Graduate" college "College Graduate" age "Age") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace

drop exposure
eststo clear

********************************************************************************
*	 							 OUTCOMES W/O WEIGHTS						   *
********************************************************************************
** Figures A-6a and A-6b of the Main Appendix

eststo clear

gen exposure=hurricane_index1 
eststo: reghdfe climmig_importance 1.post#c.exposure $core if estsample==1, cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Unweighted"
estadd local Exposure "Index"

eststo: reghdfe climmig_action 1.post#c.exposure $core if estsample==1, cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Unweighted"
estadd local Exposure "Index"

eststo: reghdfe climchg_importance 1.post#c.exposure $core if estsample==1, cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Unweighted"
estadd local Exposure "Index"

eststo: reghdfe climchg_action 1.post#c.exposure $core if estsample==1, cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Unweighted"
estadd local Exposure "Index"

eststo: reghdfe climchg_mitigation 1.post#c.exposure $core if estsample==1, cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Unweighted"
estadd local Exposure "Index"

eststo: reghdfe climchg_adaptation 1.post#c.exposure $core if estsample==1, cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Unweighted"
estadd local Exposure "Index"

eststo: reghdfe climchg_science 1.post#c.exposure $core if estsample==1, cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Unweighted"
estadd local Exposure "Index"

esttab using "${tabs}/Climate_Unweighted.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure republican democrat woman highschool college age) stats(N Exposure cov County Date, fmt(0 3 3) labels("Observations" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post" republican "& \\ Republican" democrat "Democrat" woman "Woman" highschool "High School Graduate" college "College Graduate" age "Age") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace

eststo clear

eststo: reghdfe climmig_importance 1.post#c.exposure $core if estsample==1 [pw=rweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Regional"
estadd local Exposure "Index"

eststo: reghdfe climmig_action 1.post#c.exposure $core if estsample==1 [pw=rweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Regional"
estadd local Exposure "Index"

eststo: reghdfe climchg_importance 1.post#c.exposure $core if estsample==1 [pw=rweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Regional"
estadd local Exposure "Index"

eststo: reghdfe climchg_action 1.post#c.exposure $core if estsample==1 [pw=rweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Regional"
estadd local Exposure "Index"

eststo: reghdfe climchg_mitigation 1.post#c.exposure $core if estsample==1 [pw=rweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Regional"
estadd local Exposure "Index"

eststo: reghdfe climchg_adaptation 1.post#c.exposure $core if estsample==1 [pw=rweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Regional"
estadd local Exposure "Index"

eststo: reghdfe climchg_science 1.post#c.exposure $core if estsample==1 [pw=rweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Regional"
estadd local Exposure "Index"

esttab using "${tabs}/Climate_RegionalWeight.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure republican democrat woman highschool college age) stats(N Exposure cov County Date, fmt(0 3 3) labels("Observations" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post" republican "& \\ Republican" democrat "Democrat" woman "Woman" highschool "High School Graduate" college "College Graduate" age "Age") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace

eststo clear

eststo: reghdfe climmig_importance 1.post#c.exposure $core if estsample==1, cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Unweighted"
estadd local Exposure "Index"

eststo: reghdfe climmig_importance 1.post#c.exposure $core if estsample==1 [pw=rweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Regional"
estadd local Exposure "Index"

eststo: reghdfe climmig_action 1.post#c.exposure $core if estsample==1, cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Unweighted"
estadd local Exposure "Index"

eststo: reghdfe climmig_action 1.post#c.exposure $core if estsample==1 [pw=rweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Regional"
estadd local Exposure "Index"

eststo: reghdfe climchg_importance 1.post#c.exposure $core if estsample==1, cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Unweighted"
estadd local Exposure "Index"

eststo: reghdfe climchg_importance 1.post#c.exposure $core if estsample==1 [pw=rweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Regional"
estadd local Exposure "Index"

eststo: reghdfe climchg_action 1.post#c.exposure $core if estsample==1, cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Unweighted"
estadd local Exposure "Index"

eststo: reghdfe climchg_action 1.post#c.exposure $core if estsample==1 [pw=rweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Regional"
estadd local Exposure "Index"

eststo: reghdfe climchg_mitigation 1.post#c.exposure $core if estsample==1, cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Unweighted"
estadd local Exposure "Index"

eststo: reghdfe climchg_mitigation 1.post#c.exposure $core if estsample==1 [pw=rweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Regional"
estadd local Exposure "Index"

eststo: reghdfe climchg_adaptation 1.post#c.exposure $core if estsample==1, cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Unweighted"
estadd local Exposure "Index"

eststo: reghdfe climchg_adaptation 1.post#c.exposure $core if estsample==1 [pw=rweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Regional"
estadd local Exposure "Index"

eststo: reghdfe climchg_science 1.post#c.exposure $core if estsample==1, cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Unweighted"
estadd local Exposure "Index"

eststo: reghdfe climchg_science 1.post#c.exposure $core if estsample==1 [pw=rweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Weights "Regional"
estadd local Exposure "Index"

coefplot (est1, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est3, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est5, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est7, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est9, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est11, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est13, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))), keep(1.post#c.exposure) ci(95 90) yline(0, lcolor(cranberry) lpatt(shortdash)) xtitle("Hurricane Exposure x Post", size(medium)) xscale(titlegap(*5)) xlabel(-.1(.1).2) xmtick(-.1(.05).2) legend(off) xline(0, lcolor(cranberry) lpatt(shortdash)) ylabel(.62 "Issue Importance of Climate Migration" .75 "Policy Action on Climate Migration" .88 "Issue Importance of Climate Change" 1 "Policy Action on Climate Change" 1.12 "Climate Change Mitigation Policies" 1.25 "Climate Change Adaptation Policies" 1.37 "Science of Climate Change")
graph export "${figs}/climate_unweighted.png", replace

coefplot (est2, msymbol(S) mfcolor(gs9) mlcolor(gs9) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(gs9 gs9) lwidth(.55 1.1))) (est4, msymbol(S) mfcolor(gs9) mlcolor(gs9) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(gs9 gs9) lwidth(.55 1.1))) (est6, msymbol(S) mfcolor(gs9) mlcolor(gs9) msize(vlarge) mlabel(cond(@pval<.001, "{it:p} < 0.001", "")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(gs9 gs9) lwidth(.55 1.1))) (est8, msymbol(S) mfcolor(gs9) mlcolor(gs9) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(gs9 gs9) lwidth(.55 1.1))) (est10, msymbol(S) mfcolor(gs9) mlcolor(gs9) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(gs9 gs9) lwidth(.55 1.1))) (est12, msymbol(S) mfcolor(gs9) mlcolor(gs9) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(gs9 gs9) lwidth(.55 1.1))) (est14, msymbol(S) mfcolor(gs9) mlcolor(gs9) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(gs9 gs9) lwidth(.55 1.1))), keep(1.post#c.exposure) ci(95 90) yline(0, lcolor(cranberry) lpatt(shortdash)) xtitle("Hurricane Exposure x Post", size(medium)) xscale(titlegap(*5)) xlabel(-.1(.1).3) xmtick(-.1(.05).3) legend(off) xline(0, lcolor(cranberry) lpatt(shortdash)) ylabel(.62 "Issue Importance of Climate Migration" .75 "Policy Action on Climate Migration" .88 "Issue Importance of Climate Change" 1 "Policy Action on Climate Change" 1.12 "Climate Change Mitigation Policies" 1.25 "Climate Change Adaptation Policies" 1.37 "Science of Climate Change")
graph export "${figs}/climate_rweighted.png", replace

drop exposure
eststo clear

********************************************************************************
* 							 OUTCOMES W/ STATE CLUSTERS						   *
********************************************************************************
** Table A-10 of the Main Appendix

eststo clear

gen exposure=hurricane_index1 
eststo: reghdfe climmig_importance 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(statefp) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climmig_action 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(statefp) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_importance 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(statefp) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_action 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(statefp) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_mitigation 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(statefp) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_adaptation 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(statefp) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_science 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(statefp) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

esttab using "${tabs}/Climate_Outcomes_StateCluster.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure) stats(N aic Exposure cov County Date Demographic, fmt(0 3 3) labels("Observations" "AIC" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE" "\hspace{3mm}Demographic Covariates")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace
esttab using "${tabs}/Climate_Outcomes_StateCluster_Covariates.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure republican democrat woman highschool college age) stats(N Exposure cov County Date, fmt(0 3 3) labels("Observations" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post" republican "& \\ Republican" democrat "Democrat" woman "Woman" highschool "High School Graduate" college "College Graduate" age "Age") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace

drop exposure
eststo clear

********************************************************************************
* 							 OUTCOMES W/ COMMAND CLUSTERS					   *
********************************************************************************
** Table A-9 of the Main Appendix

eststo clear

gen exposure=hurricane_index1 
eststo: reghdfe climmig_importance 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(emg_command) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climmig_action 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(emg_command) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_importance 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(emg_command) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_action 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(emg_command) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_mitigation 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(emg_command) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_adaptation 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(emg_command) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_science 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(emg_command) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Exposure "Index"

esttab using "${tabs}/Climate_Outcomes_CommandCluster.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure) stats(N aic Exposure cov County Date Demographic, fmt(0 3 3) labels("Observations" "AIC" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE" "\hspace{3mm}Demographic Covariates")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace
esttab using "${tabs}/Climate_Outcomes_CommandCluster_Covariates.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure republican democrat woman highschool college age) stats(N Exposure cov County Date, fmt(0 3 3) labels("Observations" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post" republican "& \\ Republican" democrat "Democrat" woman "Woman" highschool "High School Graduate" college "College Graduate" age "Age") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace

drop exposure
eststo clear

********************************************************************************
* 						 OUTCOMES W/ INDIVIDUAL COVARIATES					   *
********************************************************************************
** Table A-8 of the Main Appendix

eststo clear

gen exposure=hurricane_index1 
eststo: reghdfe climmig_importance 1.post#c.exposure $core $additional if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe climmig_action 1.post#c.exposure $core $additional if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_importance 1.post#c.exposure $core $additional if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_action 1.post#c.exposure $core $additional if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_mitigation 1.post#c.exposure $core $additional if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_adaptation 1.post#c.exposure $core $additional if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_science 1.post#c.exposure $core $additional if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

esttab using "${tabs}/Climate_Outcomes_Individual.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure republican democrat woman highschool college age conservative liberal 0.race 1.race 2.race 3.race 4.race 6.race employed native religiosity empathy pol_interest) stats(N aic Exposure cov County Date, fmt(0 3 3) labels("Observations" "AIC" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post" republican "& \\ Republican" democrat "& \\ Democrat" woman "& \\ Woman" highschool "& \\ High School Graduate" college "& \\ College Graduate" age "& \\ Age" conservative "& \\ Conservative" liberal "& \\ Liberal" 0.race "& \\ White" 1.race "& \\ Black" 2.race "& \\ Latinx" 3.race "& \\ Asian" 4.race "& \\ Native/Indigenous" 6.race "& \\ Multiracial" employed "& \\ Employed" native "& \\ Native Born" religiosity "& \\ Religiosity" empathy "& \\ Empathy" pol_interest "& \\ Political Interest") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace

drop exposure
eststo clear

********************************************************************************
* 						 OUTCOMES W/ COUNTY COVARIATES						   *
********************************************************************************
** Table A-12 of the Main Appendix

eststo clear

gen exposure=hurricane_index1 
eststo: reghdfe climmig_importance 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date c.repvote20#start_date c.dmig2021#start_date c.imig2021#start_date c.ian_waze#start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Trump "Yes"
estadd local Migration "Yes"
estadd local Waze "Yes"
estadd local Exposure "Index"

eststo: reghdfe climmig_action 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date c.repvote20#start_date c.dmig2021#start_date c.imig2021#start_date c.ian_waze#start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Trump "Yes"
estadd local Migration "Yes"
estadd local Waze "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_importance 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date c.repvote20#start_date c.dmig2021#start_date c.imig2021#start_date c.ian_waze#start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Trump "Yes"
estadd local Migration "Yes"
estadd local Waze "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_action 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date c.repvote20#start_date c.dmig2021#start_date c.imig2021#start_date c.ian_waze#start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Trump "Yes"
estadd local Migration "Yes"
estadd local Waze "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_mitigation 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date c.repvote20#start_date c.dmig2021#start_date c.imig2021#start_date c.ian_waze#start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Trump "Yes"
estadd local Migration "Yes"
estadd local Waze "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_adaptation 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date c.repvote20#start_date c.dmig2021#start_date c.imig2021#start_date c.ian_waze#start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Trump "Yes"
estadd local Migration "Yes"
estadd local Waze "Yes"
estadd local Exposure "Index"

eststo: reghdfe climchg_science 1.post#c.exposure $core if estsample==1 [pw=eweight], cluster(geoid) abs(geoid start_date c.repvote20#start_date c.dmig2021#start_date c.imig2021#start_date c.ian_waze#start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Demographic "Yes"
estadd local Trump "Yes"
estadd local Migration "Yes"
estadd local Waze "Yes"
estadd local Exposure "Index"

esttab using "${tabs}/Climate_Outcomes_County.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure) stats(N aic Exposure cov County Date Demographic Trump Migration Waze, fmt(0 3 3) labels("Observations" "AIC" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE" "\hspace{3mm}Demographic Covariates" "\hspace{3mm}Republican Voteshare x Date of Survey" "\hspace{3mm}Migration x Date of Survey" "\hspace{3mm}Pre-Hurricane Traffic x Date of Survey")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace
esttab using "${tabs}/Climate_Outcomes_County_Covariates.tex", style(tex) b(3) se(3) nonotes keep(1.post#c.exposure republican democrat woman highschool college age) stats(N Exposure cov County Date Trump Migration Waze, fmt(0 3 3) labels("Observations" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE" "\hspace{3mm}Republican Voteshare x Date of Survey" "\hspace{3mm}Migration x Date of Survey" "\hspace{3mm}Pre-Hurricane Traffic x Date of Survey")) varlabels(1.post#c.exposure "& \\ Hurricane Exposure x Post" republican "& \\ Republican" democrat "Democrat" woman "Woman" highschool "High School Graduate" college "College Graduate" age "Age") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{11}{c}} \hline & \\ & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Migration}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Climate Change}\\\textbf{Policies}}} & & \shortstack{\textbf{Science of}\\\textbf{Climate Change}}} \\ \cline{3-4} \cline{6-7} \cline{9-10} \cline{12-12} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "\shortstack{ \\Issue\\Importance}" "\shortstack{ \\Policy\\Action}" "Mitigation" "Adaptation" "Science") extracols(1 3 5 7) replace

drop exposure
eststo clear

********************************************************************************
* 							 EFFECTS DECAY BY DISTANCE						   *
********************************************************************************
** Figure A-11 of the Main Appendix

eststo clear

eststo: reghdfe climmig_importance 1.post#1.ian_prox1 1.post#1.ian_prox2 1.post#1.ian_prox3 1.post#1.ian_prox4 1.post#1.ian_prox5 1.post#1.ian_prox6 $core if estsample==1 & inrange(ian_distance_mi, 0, 1000) [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

coefplot (est1, msymbol(O) mfcolor(white) mlcolor(black) msize(vlarge) ciopts(lcolor(black black) lwidth(.55 1.1))), keep(1.post#1.ian_prox1 1.post#1.ian_prox2 1.post#1.ian_prox3 1.post#1.ian_prox4 1.post#1.ian_prox5 1.post#1.ian_prox6) vert xlabel(1 `" "0-10" "x Post" "' 2 `""10-25" "x Post""' 3 `""25-50" "x Post""' 4 `""50-75" "x Post""' 5 `""75-100" "x Post""' 6 `""100-500" "x Post""', labsize(vsmall)) ci(95 90) yline(0, lcolor(cranberry) lpatt(shortdash)) ylabel(-.4(.2)1) ymtick(-.4(.1)1) ytitle("Issue Importance of Climate Migration", size(medium)) yscale(titlegap(*3)) xtitle("Miles from Hurricane Ian Eyepath", size(medium)) xscale(titlegap(*10))
graph export "${figs}/climmig_importance_prox.png", replace

eststo: reghdfe climmig_action 1.post#1.ian_prox1 1.post#1.ian_prox2 1.post#1.ian_prox3 1.post#1.ian_prox4 1.post#1.ian_prox5 1.post#1.ian_prox6 $core if estsample==1 & inrange(ian_distance_mi, 0, 1000) [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

coefplot (est2, msymbol(O) mfcolor(white) mlcolor(black) msize(vlarge) ciopts(lcolor(black black) lwidth(.55 1.1))), keep(1.post#1.ian_prox1 1.post#1.ian_prox2 1.post#1.ian_prox3 1.post#1.ian_prox4 1.post#1.ian_prox5 1.post#1.ian_prox6) vert xlabel(1 `" "0-10" "x Post" "' 2 `""10-25" "x Post""' 3 `""25-50" "x Post""' 4 `""50-75" "x Post""' 5 `""75-100" "x Post""' 6 `""100-500" "x Post""', labsize(vsmall)) ci(95 90) yline(0, lcolor(cranberry) lpatt(shortdash)) ylabel(-.6(.2).8) ymtick(-.6(.1).8) ytitle("Policy Action on Climate Migration", size(medium)) yscale(titlegap(*-20)) xtitle("Miles from Hurricane Ian Eyepath", size(medium)) xscale(titlegap(*10))
graph export "${figs}/climmig_action_prox.png", replace

eststo: reghdfe climchg_importance 1.post#1.ian_prox1 1.post#1.ian_prox2 1.post#1.ian_prox3 1.post#1.ian_prox4 1.post#1.ian_prox5 1.post#1.ian_prox6 $core if estsample==1 & inrange(ian_distance_mi, 0, 1000) [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

coefplot (est3, msymbol(O) mfcolor(white) mlcolor(black) msize(vlarge) ciopts(lcolor(black black) lwidth(.55 1.1))), keep(1.post#1.ian_prox1 1.post#1.ian_prox2 1.post#1.ian_prox3 1.post#1.ian_prox4 1.post#1.ian_prox5 1.post#1.ian_prox6) vert xlabel(1 `" "0-10" "x Post" "' 2 `""10-25" "x Post""' 3 `""25-50" "x Post""' 4 `""50-75" "x Post""' 5 `""75-100" "x Post""' 6 `""100-500" "x Post""', labsize(vsmall)) ci(95 90) yline(0, lcolor(cranberry) lpatt(shortdash)) ylabel(-.4(.2)1) ymtick(-.4(.1)1) ytitle("Issue Importance of Climate Change", size(medium)) yscale(titlegap(*3)) xtitle("Miles from Hurricane Ian Eyepath", size(medium)) xscale(titlegap(*10))
graph export "${figs}/climchg_importance_prox.png", replace

eststo: reghdfe climchg_action 1.post#1.ian_prox1 1.post#1.ian_prox2 1.post#1.ian_prox3 1.post#1.ian_prox4 1.post#1.ian_prox5 1.post#1.ian_prox6 $core if estsample==1 & inrange(ian_distance_mi, 0, 1000) [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

coefplot (est4, msymbol(O) mfcolor(white) mlcolor(black) msize(vlarge) ciopts(lcolor(black black) lwidth(.55 1.1))), keep(1.post#1.ian_prox1 1.post#1.ian_prox2 1.post#1.ian_prox3 1.post#1.ian_prox4 1.post#1.ian_prox5 1.post#1.ian_prox6) vert xlabel(1 `" "0-10" "x Post" "' 2 `""10-25" "x Post""' 3 `""25-50" "x Post""' 4 `""50-75" "x Post""' 5 `""75-100" "x Post""' 6 `""100-500" "x Post""', labsize(vsmall)) ci(95 90) yline(0, lcolor(cranberry) lpatt(shortdash)) ylabel(-.4(.2)1) ymtick(-.4(.1)1) ytitle("Policy Action on Climate Change", size(medium)) yscale(titlegap(*3)) xtitle("Miles from Hurricane Ian Eyepath", size(medium)) xscale(titlegap(*10))
graph export "${figs}/climchg_action_prox.png", replace

eststo: reghdfe climchg_mitigation 1.post#1.ian_prox1 1.post#1.ian_prox2 1.post#1.ian_prox3 1.post#1.ian_prox4 1.post#1.ian_prox5 1.post#1.ian_prox6 $core if estsample==1 & inrange(ian_distance_mi, 0, 1000) [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

coefplot (est5, msymbol(O) mfcolor(white) mlcolor(black) msize(vlarge) ciopts(lcolor(black black) lwidth(.55 1.1))), keep(1.post#1.ian_prox1 1.post#1.ian_prox2 1.post#1.ian_prox3 1.post#1.ian_prox4 1.post#1.ian_prox5 1.post#1.ian_prox6) vert xlabel(1 `" "0-10" "x Post" "' 2 `""10-25" "x Post""' 3 `""25-50" "x Post""' 4 `""50-75" "x Post""' 5 `""75-100" "x Post""' 6 `""100-500" "x Post""', labsize(vsmall)) ci(95 90) yline(0, lcolor(cranberry) lpatt(shortdash)) ylabel(-.8(.4)1.2) ymtick(-.8(.2)1.2) ytitle("Climate Change Mitigation Policies", size(medium)) yscale(titlegap(*3)) xtitle("Miles from Hurricane Ian Eyepath", size(medium)) xscale(titlegap(*10))
graph export "${figs}/climchg_mitigation_prox.png", replace

eststo: reghdfe climchg_adaptation 1.post#1.ian_prox1 1.post#1.ian_prox2 1.post#1.ian_prox3 1.post#1.ian_prox4 1.post#1.ian_prox5 1.post#1.ian_prox6 $core if estsample==1 & inrange(ian_distance_mi, 0, 1000) [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

coefplot (est6, msymbol(O) mfcolor(white) mlcolor(black) msize(vlarge) ciopts(lcolor(black black) lwidth(.55 1.1))), keep(1.post#1.ian_prox1 1.post#1.ian_prox2 1.post#1.ian_prox3 1.post#1.ian_prox4 1.post#1.ian_prox5 1.post#1.ian_prox6) vert xlabel(1 `" "0-10" "x Post" "' 2 `""10-25" "x Post""' 3 `""25-50" "x Post""' 4 `""50-75" "x Post""' 5 `""75-100" "x Post""' 6 `""100-500" "x Post""', labsize(vsmall)) ci(95 90) yline(0, lcolor(cranberry) lpatt(shortdash)) ylabel(-.8(.4)1.2) ymtick(-.8(.2)1.2) ytitle("Climate Change Adaptation Policies", size(medium)) yscale(titlegap(*3)) xtitle("Miles from Hurricane Ian Eyepath", size(medium)) xscale(titlegap(*10))
graph export "${figs}/climchg_adaptation_prox.png", replace

eststo: reghdfe climchg_science 1.post#1.ian_prox1 1.post#1.ian_prox2 1.post#1.ian_prox3 1.post#1.ian_prox4 1.post#1.ian_prox5 1.post#1.ian_prox6 $core if estsample==1 & inrange(ian_distance_mi, 0, 1000) [pw=eweight], cluster(geoid) abs(geoid start_date)
estadd local County "Yes"
estadd local Date "Yes"
estadd local Exposure "Index"

coefplot (est7, msymbol(O) mfcolor(white) mlcolor(black) msize(vlarge) ciopts(lcolor(black black) lwidth(.55 1.1))), keep(1.post#1.ian_prox1 1.post#1.ian_prox2 1.post#1.ian_prox3 1.post#1.ian_prox4 1.post#1.ian_prox5 1.post#1.ian_prox6) vert xlabel(1 `" "0-10" "x Post" "' 2 `""10-25" "x Post""' 3 `""25-50" "x Post""' 4 `""50-75" "x Post""' 5 `""75-100" "x Post""' 6 `""100-500" "x Post""', labsize(vsmall)) ci(95 90) yline(0, lcolor(cranberry) lpatt(shortdash)) ylabel(-.8(.4)1.2) ymtick(-.8(.2)1.2) ytitle("Science of Climate Change", size(medium)) yscale(titlegap(*3)) xtitle("Miles from Hurricane Ian Eyepath", size(medium)) xscale(titlegap(*10))
graph export "${figs}/climchg_science_prox.png", replace


esttab using "${tabs}/DistanceDecay_Climate.tex", style(tex) b(3) se(3) nonotes keep(1.post#1.ian_prox1 1.post#1.ian_prox2 1.post#1.ian_prox3 1.post#1.ian_prox4 1.post#1.ian_prox5 1.post#1.ian_prox6 republican democrat woman highschool college age) stats(N aic Exposure cov County Date, fmt(0 3 3) labels("Observations" "AIC" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}County FE" "\hspace{3mm}Date of Survey FE")) varlabels(1.post#1.ian_prox1 "& \\ 0-10 Miles from Eyepath x Post" 1.post#1.ian_prox2 "& \\ 10-25 Miles from Eyepath x Post" 1.post#1.ian_prox3 "& \\ 25-50 Miles from Eyepath x Post" 1.post#1.ian_prox4 "& \\ 50-75 Miles from Eyepath x Post" 1.post#1.ian_prox5 "& \\ 75-100 Miles from Eyepath x Post" 1.post#1.ian_prox6 "& \\ 100-500 Miles from Eyepath x Post" republican "& \\ Republican" democrat "Democrat" woman "Woman" highschool "High School Graduate" college "College Graduate" age "Age") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{15}{c}} \hline & \\ & & \multicolumn{13}{c}{\shortstack{\textbf{Focal Indices}}} \\ \cline{3-15} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("\shortstack{Issue Importance of\\Climate Migration}" "\shortstack{Policy Action on\\Climate Migration}" "\shortstack{Issue Importance of\\Climate Change}" "\shortstack{Policy Action on\\Climate Change}" "\shortstack{Climate Change\\Mitigation Policies}" "\shortstack{Climate Change\\Adaptation Policies}" "\shortstack{Science of\\Climate Change}") extracols(1 2 3 4 5 6 7) replace

eststo clear

********************************************************************************
* 								 BALLOT OUTCOMES							   *
********************************************************************************
** Table 3 of the Main Paper and A-3 of the Main Appendix

use "${data}/Survey/florida_ballot.dta", clear

egen std_primturnout=std(primturnout)
gen income10000=income/10000

eststo clear

gen exposure=hurricane_index1 
eststo: reghdfe flood_yesapprove exposure, cluster(geoid) noabs
estadd local Trump "No"
estadd local Turnout "No"
estadd local Income "No"
estadd local Command "No"
estadd local Exposure "Index"

eststo: reghdfe flood_yesapprove exposure trump20 std_primturnout, cluster(geoid) noabs
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Income "No"
estadd local Command "No"
estadd local Exposure "Index"

eststo: reghdfe flood_yesapprove exposure trump20 std_primturnout, cluster(geoid) abs(emg_command)
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Income "No"
estadd local Command "Yes"
estadd local Exposure "Index"

eststo: reghdfe flood_yesapprove exposure trump20 std_primturnout income10000, cluster(geoid) abs(emg_command)
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Income "Yes"
estadd local Command "Yes"
estadd local Exposure "Index"

eststo: reghdfe flood_pass exposure, cluster(geoid) noabs
estadd local Trump "No"
estadd local Turnout "No"
estadd local Income "No"
estadd local Command "No"
estadd local Exposure "Index"

eststo: reghdfe flood_pass exposure trump20 std_primturnout, cluster(geoid) noabs
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Income "No"
estadd local Command "No"
estadd local Exposure "Index"

eststo: reghdfe flood_pass exposure trump20 std_primturnout, cluster(geoid) abs(emg_command)
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Income "No"
estadd local Command "Yes"
estadd local Exposure "Index"

eststo: reghdfe flood_pass exposure trump20 std_primturnout income10000, cluster(geoid) abs(emg_command)
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Income "Yes"
estadd local Command "Yes"
estadd local Exposure "Index"

eststo: reghdfe const_pass exposure trump20 std_primturnout income10000, cluster(geoid) abs(emg_command)
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Income "Yes"
estadd local Command "Yes"
estadd local Exposure "Index"

eststo: reghdfe home_pass exposure trump20 std_primturnout income10000, cluster(geoid) abs(emg_command)
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Income "Yes"
estadd local Command "Yes"
estadd local Exposure "Index"

esttab using "${tabs}/Climate_Ballot.tex", style(tex) b(3) se(3) nonotes keep(exposure) stats(N aic Exposure cov Trump Turnout Command Income, fmt(0 3 3) labels("Observations" "AIC" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}Trump Won in 2020" "\hspace{3mm}2022 Primary Turnout" "\hspace{3mm}Emergency Command FE" "\hspace{3mm}2021 Income Per Capita")) varlabels(exposure "& \\ Hurricane Exposure") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{14}{c}} \hline & \\ & & \multicolumn{4}{c}{\shortstack{\textbf{\% Approve Flood}\\\textbf{Mitigation Tax Break}}} & & \multicolumn{4}{c}{\shortstack{\textbf{Supermajority for Flood}\\\textbf{Mitigation Tax Break (=1)}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Supermajority for Other}\\\textbf{Ballot Initiatives (=1)}}} \\ \cline{3-6} \cline{8-11} \cline{13-14} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("Voteshare" "Voteshare" "Voteshare" "Voteshare" "Supermajority" "Supermajority" "Supermajority" "Supermajority" "Commission" "Homestead") extracols(1 5 9) replace
esttab using "${tabs}/Climate_Ballot_Covariates.tex", style(tex) b(3) se(3) nonotes keep(exposure trump20 std_primturnout income10000) stats(N Exposure cov Command, fmt(0 3 3) labels("Observations" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}Emergency Command FE")) varlabels(exposure "& \\ Hurricane Exposure" trump20 "& \\ Trump Won in 2020" std_primturnout "2022 Primary Turnout" income10000 "2021 Income Per Capita") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{14}{c}} \hline & \\ & & \multicolumn{4}{c}{\shortstack{\textbf{\% Approve Flood}\\\textbf{Mitigation Tax Break}}} & & \multicolumn{4}{c}{\shortstack{\textbf{Supermajority for Flood}\\\textbf{Mitigation Tax Break (=1)}}} & & \multicolumn{2}{c}{\shortstack{\textbf{Supermajority for Other}\\\textbf{Ballot Initiatives (=1)}}} \\ \cline{3-6} \cline{8-11} \cline{13-14} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("Voteshare" "Voteshare" "Voteshare" "Voteshare" "Supermajority" "Supermajority" "Supermajority" "Supermajority" "Commission" "Homestead") extracols(1 5 9) replace

eststo clear
** Results not presented in paper

gen popturnout= vote_total/pop2021

eststo: reghdfe dem_voteshare exposure trump20 std_primturnout, cluster(geoid) noabs
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Command "No"
estadd local Exposure "Index"

eststo: reghdfe dem_voteshare exposure trump20 std_primturnout, cluster(geoid) abs(emg_command)
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Command "Yes"
estadd local Exposure "Index"

eststo: reghdfe demsen_voteshare exposure trump20 std_primturnout, cluster(geoid) noabs
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Command "No"
estadd local Exposure "Index"

eststo: reghdfe demsen_voteshare exposure trump20 std_primturnout, cluster(geoid) abs(emg_command)
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Command "Yes"
estadd local Exposure "Index"

eststo: reghdfe vapturnout exposure trump20 std_primturnout, cluster(geoid) noabs
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Command "No"
estadd local Exposure "Index"

eststo: reghdfe vapturnout exposure trump20 std_primturnout, cluster(geoid) abs(emg_command)
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Command "Yes"
estadd local Exposure "Index"

eststo: reghdfe vapsenturnout exposure trump20 std_primturnout, cluster(geoid) noabs
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Command "No"
estadd local Exposure "Index"

eststo: reghdfe vapsenturnout exposure trump20 std_primturnout, cluster(geoid) abs(emg_command)
estadd local Trump "Yes"
estadd local Turnout "Yes"
estadd local Command "Yes"
estadd local Exposure "Index"

esttab using "${tabs}/Climate_Vote_Covariates.tex", style(tex) b(3) se(3) nonotes keep(exposure trump20 std_primturnout) stats(N Exposure cov Command, fmt(0 3 3) labels("Observations" "& \\Exposure Measure:" "\hline &\\ \textsc{Parameters}" "\hspace{3mm}Emergency Command FE")) varlabels(exposure "& \\ Hurricane Exposure" trump20 "& \\ Trump Won in 2020" std_primturnout "2022 Primary Turnout") starlevels(* .10 ** .05 *** .01) nolines prehead(\begin{tabular}{l*{13}{c}} \hline & \\ & & \multicolumn{5}{c}{\shortstack{\textbf{Democratic Voteshare in 2022}\\\textbf{Florida General Election}}} & & \multicolumn{5}{c}{\shortstack{\textbf{Voter Turnout in 2022}\\\textbf{Florida General Election}}} \\ \cline{3-7} \cline{9-13} & \\) posthead(\hline) prefoot() postfoot(\hline \end{tabular}) mtit("Gubernatorial" "Gubernatorial" "Senatorial" "Senatorial" "Gubernatorial" "Gubernatorial" "Senatorial" "Senatorial") extracols(1 3 5 7) replace

coefplot (est2, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est2, msymbol(O) mfcolor(gs9%0) mlcolor(gs9%0) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black%0) mlabpos(1) mlabgap(*2) ciopts(lcolor(gs9%0 gs9%0) lwidth(.55 1.1))) (est4, msymbol(D) mfcolor(gs9) mlcolor(gs9) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(gs9 gs9) lwidth(.55 1.1))) (est2, msymbol(O) mfcolor(gs9%0) mlcolor(gs9%0) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black%0) mlabpos(1) mlabgap(*2) ciopts(lcolor(gs9%0 gs9%0) lwidth(.55 1.1))) (est6, msymbol(O) mfcolor(black) mlcolor(black) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(black black) lwidth(.55 1.1))) (est2, msymbol(O) mfcolor(gs9%0) mlcolor(gs9%0) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black%0) mlabpos(1) mlabgap(*2) ciopts(lcolor(gs9%0 gs9%0) lwidth(.55 1.1))) (est8, msymbol(D) mfcolor(gs9) mlcolor(gs9) msize(vlarge) mlabel("{it:p} = " + string(@pval,"%9.3f")) mlabcolor(black) mlabpos(1) mlabgap(*2) ciopts(lcolor(gs9 gs9) lwidth(.55 1.1))), keep(exposure) ci(95 90) yline(0, lcolor(cranberry) lpatt(shortdash)) ylabel(.625 `" "Democratic Voteshare in 2022" "Florida Gubernatorial Election" "' .88 `" "Democratic Voteshare in 2022" "Florida Senatorial Election" "' 1.125 `" "Turnout Rate in 2022" "Florida Gubernatorial Election" "' 1.38 `" "Turnout Rate in 2022" "Florida Senatorial Election" "') xtitle("Effect of Hurricane Exposure", size(medium)) xscale(titlegap(*5)) xlabel(-.01(.01).03) xmtick(-.01(.005).03) legend(off) xline(0, lcolor(cranberry) lpatt(shortdash)) yline(1, lcolor(black) lwidth(*1.5)) xline(0, lcolor(cranberry) lpatt(shortdash))
graph export "${figs}/votegov.png", replace

drop exposure
eststo clear
